// This example shows how to store current state of the subscribed items in a dictionary. using System; using System.Collections.Generic; using System.Threading; using OpcLabs.EasyOpc.DataAccess; using OpcLabs.EasyOpc.DataAccess.OperationModel; namespace DocExamples.DataAccess._EasyDAClient { partial class SubscribeMultipleItems { public static void StoreInDictionary() { // Instantiate the client object. using (var client = new EasyDAClient()) { client.ItemChanged += client_ItemChanged_StoreInDictionary; Console.WriteLine("Subscribing item changes..."); client.SubscribeMultipleItems( new[] { new DAItemGroupArguments("", "OPCLabs.KitServer.2", "Simulation.Random", 1000, null), new DAItemGroupArguments("", "OPCLabs.KitServer.2", "Trends.Ramp (1 min)", 1000, null), new DAItemGroupArguments("", "OPCLabs.KitServer.2", "Trends.Sine (1 min)", 1000, null), new DAItemGroupArguments("", "OPCLabs.KitServer.2", "Simulation.Register_I4", 1000, null) }); Console.WriteLine("Processing item changed events for 1 minute..."); int startTickCount = Environment.TickCount; do { Thread.Sleep(5*1000); // Each 5 seconds, display the current state of the items we have subscribed to. lock (_serialize) { Console.WriteLine(); foreach (KeyValuePair<DAItemDescriptor, DAVtqResult> pair in _vtqResultDictionary) { DAItemDescriptor itemDescriptor = pair.Key; DAVtqResult vtqResult = pair.Value; Console.WriteLine($"{itemDescriptor}: {vtqResult}"); } // The code above shows how you can process the complete contents of the dictionary. In other // scenarios, you may want to access just a specific entry in the dictionary. You can achieve that // by indexing the dictionary by the item descriptor of the item you are interested in. } } while (Environment.TickCount < startTickCount + 60*1000); Console.WriteLine("Unsubscribing item changes..."); } Console.WriteLine("Finished."); } // Item changed event handler static void client_ItemChanged_StoreInDictionary(object sender, EasyDAItemChangedEventArgs e) { lock (_serialize) // Convert the event arguments to a DAVtq result object, and store it in the dictionary under the key which // is the item descriptor of the item this item changed event is for. _vtqResultDictionary[e.Arguments.ItemDescriptor] = (DAVtqResult)e; } // Holds last known state of each subscribed item. private static readonly Dictionary<DAItemDescriptor, DAVtqResult> _vtqResultDictionary = new Dictionary<DAItemDescriptor, DAVtqResult>(); // Synchronization object used to prevent simultaneous access to the dictionary. private static readonly object _serialize = new object(); } }
# This example shows how to store current state of the subscribed items in a dictionary. # The QuickOPC package is needed. Install it using "pip install opclabs_quickopc". import opclabs_quickopc import threading import time # Import .NET namespaces. from OpcLabs.EasyOpc.DataAccess import * from OpcLabs.EasyOpc.DataAccess.OperationModel import * lock = threading.Lock() vtqResultDictionary = {} # Item changed event handler. def itemChanged(sender, eventArgs): global lock global vtqResultDictionary with lock: # Convert the event arguments to a DAVtq result object, and store it in the dictionary under the key which # is the item descriptor of the item this item changed event is for. vtqResultDictionary[eventArgs.Arguments.ItemDescriptor] = EasyDAItemChangedEventArgs.ToDAVtqResult(eventArgs) # Instantiate the client object. client = EasyDAClient() # Hook events. client.ItemChanged += itemChanged print('Subscribing item changes...') handleArray = IEasyDAClientExtension.SubscribeMultipleItems(client, [ DAItemGroupArguments('', 'OPCLabs.KitServer.2', 'Simulation.Random', 1000, None), DAItemGroupArguments('', 'OPCLabs.KitServer.2', 'Trends.Ramp (1 min)', 1000, None), DAItemGroupArguments('', 'OPCLabs.KitServer.2', 'Trends.Sine (1 min)', 1000, None), DAItemGroupArguments('', 'OPCLabs.KitServer.2', 'Simulation.Register_I4', 1000, None), ]) for i in range(len(handleArray)): print('handleArray[', i, ']: ', handleArray[i], sep='') print('Processing item change notifications for 1 minute...') endTime = time.time() + 60 while time.time() < endTime: time.sleep(5) # # Each 5 seconds, display the current state of the items we have subscribed to. with lock: print() print('Current state of the items:') for itemDescriptor, vtqResult in vtqResultDictionary.items(): print(itemDescriptor, ': ', vtqResult, sep='') # # The code above shows how you can process the complete contents of the dictionary. In other # scenarios, you may want to access just a specific entry in the dictionary. You can achieve that # by indexing the dictionary by the item descriptor of the item you are interested in. print() print('Unsubscribing all items...') client.UnsubscribeAllItems() client.ItemChanged -= itemChanged print('Finished.')
' This example shows how to store current state of the subscribed items in a dictionary. Imports System.Threading Imports OpcLabs.EasyOpc.DataAccess Imports OpcLabs.EasyOpc.DataAccess.OperationModel Namespace DataAccess._EasyDAClient Partial Friend Class SubscribeMultipleItems Public Shared Sub StoreInDictionary() ' Instantiate the client object. Using client = New EasyDAClient() AddHandler client.ItemChanged, AddressOf client_ItemChanged_StoreInDictionary Console.WriteLine("Subscribing item changes...") client.SubscribeMultipleItems(New DAItemGroupArguments() { New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Simulation.Random", 1000, Nothing), New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Trends.Ramp (1 min)", 1000, Nothing), New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Trends.Sine (1 min)", 1000, Nothing), New DAItemGroupArguments("", "OPCLabs.KitServer.2", "Simulation.Register_I4", 1000, Nothing) }) Console.WriteLine("Processing item changed events for 1 minute...") Dim startTickCount As Integer = Environment.TickCount Do Thread.Sleep(5 * 1000) ' Each 5 seconds, display the current state of the items we have subscribed to. SyncLock _serialize Console.WriteLine() For Each pair As KeyValuePair(Of DAItemDescriptor, DAVtqResult) In _vtqResultDictionary Dim itemDescriptor As DAItemDescriptor = pair.Key Dim vtqResult = pair.Value Console.WriteLine($"{itemDescriptor}: {vtqResult}") Next ' The code above shows how you can process the complete contents of the dictionary. In other ' scenarios, you may want to access just a specific entry in the dictionary. You can achieve that ' by indexing the dictionary by the item descriptor of the item you are interested in. End SyncLock Loop While Environment.TickCount < startTickCount + 60 * 1000 Console.WriteLine("Unsubscribing item changes...") End Using Console.WriteLine("Finished.") End Sub ' Item changed event handler Private Shared Sub client_ItemChanged_StoreInDictionary(ByVal sender As Object, ByVal e As EasyDAItemChangedEventArgs) SyncLock _serialize ' Convert the event arguments to a DAVtq result object, and store it in the dictionary under the key which ' is the item descriptor of the item this item changed event is for. _vtqResultDictionary(e.Arguments.ItemDescriptor) = CType(e, DAVtqResult) End SyncLock End Sub ' Holds last known state of each subscribed item. Private Shared ReadOnly _vtqResultDictionary As New Dictionary(Of DAItemDescriptor, DAVtqResult) ' Synchronization object used to prevent simultaneous access to the dictionary. Private Shared ReadOnly _serialize As New Object End Class End Namespace
Copyright © 2004-2023 CODE Consulting and Development, s.r.o., Plzen. All rights reserved. Web page: www.opclabs.com
Send Documentation Feedback. Resources: Knowledge Base. Technical support: Online Forums, FAQ.